﻿Public Class frmShowProjekte

    Public Rowid As Integer

    Private Sub frmShowProjekte_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'TODO: Diese Codezeile lädt Daten in die Tabelle "DbShowProjekt.ShowProjekt". Sie können sie bei Bedarf verschieben oder entfernen.
        Me.ShowProjektTableAdapter.Fill(Me.DbShowProjekt.ShowProjekt)
    End Sub

    Private Sub gvProjekte_CellClick(ByVal sender As Object, ByVal e As DataGridViewCellEventArgs) Handles gvProjekte.CellClick
        ' Ignore clicks that are not on button cells. 
        If e.RowIndex >= 0 OrElse Not e.ColumnIndex = gvProjekte.Columns("zlAuswaehlen").Index Then
            Dim taskID As Int32 = CInt(gvProjekte(0, e.RowIndex).Value)
            Dim idRow As String = gvProjekte.Rows(taskID - 1).Cells(0).Value
            Rowid = idRow
            Dim eindeutiges_from As Projekt = Projekt.GetObject()
            eindeutiges_from.projectrowId = idRow
            Me.Hide()
            frmShowAufgaben.Show()

        End If
    End Sub

    Private Sub frmShowProjekte_FormClosing(ByVal sender As System.Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles MyBase.FormClosing
        frmmain.Show()
    End Sub
End Class